(describe-buffer-case-table): Use set-char-table-range.

diff --git a/lisp/case-table.el b/lisp/case-table.el
index 3efa3d3f27e796bdc895e02e023417ad6a15e1a3..4ca99806015243bb72795e3710f3d3e699952f45 100644 (file)
--- a/lisp/case-table.el
+++ b/lisp/case-table.el
@@ -40,7 +40,7 @@
   (let ((description (make-char-table 'case-table)))
     (map-char-table
      (function (lambda (key value)
-                (set-case-table-range
+                (set-char-table-range
                  description key
                  (cond ((null key)
                         "case-invariant")